home *** CD-ROM | disk | FTP | other *** search
/ Skunkware 5 / Skunkware 5.iso / src / X11 / periodic / periodic.uil < prev    next >
Text File  |  1995-05-26  |  41KB  |  1,859 lines
  1. !******************************************************************************
  2. !******************************************************************************
  3. !*
  4. !*  (c) Copyright 1989, 1990 OPEN SOFTWARE FOUNDATION, INC.
  5. !*  ALL RIGHTS RESERVED
  6. !*  
  7. !*      THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT
  8. !*  NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY OPEN SOFTWARE
  9. !*  FOUNDATION, INC. OR ITS THIRD PARTY SUPPLIERS  
  10. !*  
  11. !*      OPEN SOFTWARE FOUNDATION, INC. AND ITS THIRD PARTY SUPPLIERS,
  12. !*  ASSUME NO RESPONSIBILITY FOR THE USE OR INABILITY TO USE ANY OF ITS
  13. !*  SOFTWARE .   OSF SOFTWARE IS PROVIDED "AS IS" WITHOUT WARRANTY OF ANY
  14. !*  KIND, AND OSF EXPRESSLY DISCLAIMS ALL IMPLIED WARRANTIES, INCLUDING
  15. !*  BUT NOT LIMITED TO THE IMPLIED WARRANTIES OF MERCHANTABILITY AND
  16. !*  FITNESS FOR A PARTICULAR PURPOSE.
  17. !*  
  18. !* Open Software Foundation is a trademark of The Open Software Foundation, Inc.
  19. !* OSF is a trademark of Open Software Foundation, Inc.
  20. !* OSF/Motif is a trademark of Open Software Foundation, Inc.
  21. !* Motif is a trademark of Open Software Foundation, Inc.
  22. !* X Window System is a trademark of the Massachusetts Institute of Technology
  23. !*
  24. !******************************************************************************
  25. !******************************************************************************
  26.  
  27. !*****************************************************************
  28. !*                                                              **
  29. !*   Author: Michael K. Yee                                     **
  30. !*   Date: August 18, 1990                                      **
  31. !*                                                              **
  32. !*****************************************************************
  33.  
  34.  
  35. module sample 
  36.     version = 'v1.1'
  37.     names = case_sensitive
  38.     objects = {
  39.     XmSeparator = gadget;
  40.     XmLabel = gadget;
  41.     XmPushButton = gadget;
  42.     XmToggleButton = gadget;
  43.     }
  44.  
  45.  
  46. !include file 'XmAppl.uil';
  47.  
  48. procedure
  49.     create_callback(integer);
  50.     quit_button_activate();
  51.     foo_activate();
  52.     zippy_null();
  53.  
  54. value
  55. !
  56. ! WIDGET DEF
  57. !
  58.     K_scale_widget          : 1;
  59.     K_drawnbutton_widget    : 2;
  60.     K_togglebutton_widget   : 3;
  61.     K_vtext1_widget         : 4;
  62.     K_vtext2_widget         : 5;
  63.     K_popup_menu_widget     : 6;
  64. !
  65. ! WIDGET LOCATIONS
  66. !
  67.     fudge : 2;
  68.     dialog_fudge : 10;
  69.     heading_fudge_x : 40;
  70.     heading_fudge_y : 25;
  71. !
  72. ! TEXT LOCATION FOR ADOBE FONTS
  73. !
  74.     title_x : 270;
  75.     title_y : 25;
  76.     subtitle_x : title_x + 80;
  77.     subtitle_y : title_y + 30;
  78.     dont_panic_x : 7;
  79.     dont_panic_y : 17;
  80.     radioactive_x : 5;
  81.     radioactive_y : 635;
  82.     radioactive_height : 100;
  83.     radioactive_width : 210;
  84.     radioactive_title_x : radioactive_x;
  85.     radioactive_title_y : radioactive_y - 35;
  86. !    radioactive_x : 70;
  87. !    radioactive_y : 635;
  88. !    radioactive_height : 100;
  89. !    radioactive_width : 185;
  90. !    radioactive_title_x : radioactive_x - 60;
  91. !    radioactive_title_y : radioactive_y + 5;
  92. !!
  93. !! TEXT LOCATION FOR MIT FONTS
  94. !!
  95. !    title_x : 200;
  96. !    title_y : 25;
  97. !    subtitle_x : title_x + 60;
  98. !    subtitle_y : title_y + 30;
  99. !    dont_panic_x : 7;
  100. !    dont_panic_y : 17;
  101. !    radioactive_x : 10;
  102. !    radioactive_y : 635;
  103. !    radioactive_height : 100;
  104. !    radioactive_width : 200;
  105. !    radioactive_title_x : radioactive_x;
  106. !    radioactive_title_y : radioactive_y - 35;
  107.  
  108.     table_origin_x : 100;
  109.     table_origin_y : 95;
  110.  
  111.     element_height : 100;
  112.     element_width : 100;
  113.  
  114.     element_vert_sep : 10;
  115.     element_horiz_sep : 10;
  116.  
  117.     centre_box_x : table_origin_x + (element_width * 2) + fudge;
  118.     centre_box_y : table_origin_y + (element_height * 2) + fudge;
  119.     centre_box_width : 380;
  120.     centre_box_height : 300 - fudge;
  121.  
  122.     legend_x : centre_box_x + (centre_box_width/2) - 35;
  123.     legend_y : centre_box_y - 160;
  124.  
  125. !
  126. ! ADOBE FONTS
  127. !
  128.     small_font :
  129.     font('6x12');
  130.     dialog_font :
  131.     font('-adobe-helvetica-bold-r-normal--12-*-*-*-*-*-*-*');
  132.     subtitle_font :
  133.     font('-adobe-new century schoolbook-bold-r-normal--14-*-*-*-*-*-*-*');
  134.     heading_font :
  135.     font('-adobe-new century schoolbook-bold-r-normal--14-*-*-*-*-*-*-*');
  136.     fixed_font :
  137.     font('fixed');
  138.     var_font :
  139.     font('variable');
  140.     hel_bold_font :
  141.     font('-adobe-helvetica-bold-r-normal--12-*-*-*-*-*-*-*');
  142.     hel_bold_font14 :
  143.     font('-adobe-helvetica-bold-r-normal--14-*-*-*-*-*-*-*');
  144.     newcenturyschlbk_roman14 :
  145.     font('-adobe-new century schoolbook-medium-r-normal--14-*-*-*-*-*-*-*');
  146.     newcenturyschlbk_roman12 :
  147.     font('-adobe-new century schoolbook-medium-r-normal--12-*-*-*-*-*-*-*');
  148.     newcenturyschlbk_bold14 :
  149.     font('-adobe-new century schoolbook-bold-r-normal--14-*-*-*-*-*-*-*');
  150.     newcenturyschlbk_bold24 :
  151.     font('-adobe-new century schoolbook-bold-r-normal--24-*-*-*-*-*-*-*');
  152.     times_bold_font :
  153.     font('-adobe-times-bold-r-normal--24-*-*-*-*-*-*-*');
  154. !!
  155. !! MIT FONTS
  156. !!
  157. !    dialog_font : font('fixed');
  158. !    subtitle_font : font('vr-20');
  159. !    heading_font : font('vr-20');
  160. !    var_font : font('variable');
  161. !    hel_bold_font : font('variable');
  162. !    hel_bold_font14 : font('variable');
  163. !    newcenturyschlbk_roman14 : font('variable');
  164. !    newcenturyschlbk_roman12 : font('variable');
  165. !    newcenturyschlbk_bold14 : font('variable');
  166. !    newcenturyschlbk_bold24 : font('vbee-36');
  167. !    times_bold_font : font('vmic-25');
  168. !
  169. ! COLORS and ICONS
  170. !
  171. value black  : color('black',foreground);
  172. value white  : color('LightGray',background);
  173.  
  174. value motif_colors : color_table(black = 'x',white=' ');
  175. value motif_icon : icon(color_table = motif_colors,
  176. '                                                        ',
  177. '                                                        ',
  178. '                                                        ',
  179. '                                                        ',
  180. '                                                        ',
  181. '                                                        ',
  182. '       x x x x x x x x x x x     x x x x x x x x x x x  ',
  183. '        x x x x x x x x x x       x x x x x x x x x x   ',
  184. '      x                      x  x                      x',
  185. '       x xxxxxxxxxxxxxxxxxx xx   x x x x x x x x x x  xx',
  186. '      x  xxxxxxxxxxxxxxxxxx xx  x   x x x x x x x x x xx',
  187. '       x xxxxxxxxxxxxxxxxxx xx   x x x x x x x x x x  xx',
  188. '      x  xxxxxxxxxxxxxxxxxx xx  x   x x x x x x x x x xx',
  189. '       x xxxxxxxxxxxxxxxxxx xx   x x x x x x x x x x  xx',
  190. '      x  xxxxxxxxxxxxxxxxxx xx  x   x x x x x x x x x xx',
  191. '       x xxxxxxxxxxxxxxxxxx xx   x x x x x x x x x x  xx',
  192. '      x  xxxxxxxxxxxxxxxxxx xx  x   x x x x x x x x x xx',
  193. '       x xxxxxxxxxxxxxxxxxx xx   x x x x x x x x x x  xx',
  194. '      x  xxxxxxxxxxxxxxxxxx xx  x   x x x x x x x x x xx',
  195. '       x xxxxxxxxxxxxxxxxxx xx   x x x x x x x x x x  xx',
  196. '      x  xxxxxxxxxxxxxxxxxx xx  x   x x x x x x x x x xx',
  197. '       x xxxxxxxxxxxxxxxxxx xx   x x x x x x x x x x  xx',
  198. '      x  xxxxxxxxxxxxxxxxxx xx  x   x x x x x x x x x xx',
  199. '       x xxxxxxxxxxxxxxxxxx xx   x x x x x x x x x x  xx',
  200. '      x  xxxxxxxxxxxxxxxxxx xx  x   x x x x x x x x x xx',
  201. '       x xxxxxxxxxxxxxxxxxx xx   x x x x x x x x x x  xx',
  202. '      x  xxxxxxxxxxxxxxxxxx xx  x   x x x x x x x x x xx',
  203. '       x                     x   x                     x',
  204. '      x  xxxxxxxxxxxxxxxxxx     x  xxxxxxxxxxxxxxxxxx   ',
  205. '        xxxxxxxxxxxxxxxxxxxx      xxxxxxxxxxxxxxxxxxxx  ',
  206. '                                                        ',
  207. '                                                        ',
  208. '       x x x x x x x x x x x     x x x x x x x x x x x  ',
  209. '        x x x x x x x x x x       x x x x x x x x x x   ',
  210. '      x                      x  x                      x',
  211. '       x x x x x x x x x x  xx   x xxxxxxxxxxxxxxxxxx xx',
  212. '      x   x x x x x x x x x xx  x  xxxxxxxxxxxxxxxxxx xx',
  213. '       x x x x x x x x x x  xx   x xxxxxxxxxxxxxxxxxx xx',
  214. '      x   x x x x x x x x x xx  x  xxxxxxxxxxxxxxxxxx xx',
  215. '       x x x x x x x x x x  xx   x xxxxxxxxxxxxxxxxxx xx',
  216. '      x   x x x x x x x x x xx  x  xxxxxxxxxxxxxxxxxx xx',
  217. '       x x x x x x x x x x  xx   x xxxxxxxxxxxxxxxxxx xx',
  218. '      x   x x x x x x x x x xx  x  xxxxxxxxxxxxxxxxxx xx',
  219. '       x x x x x x x x x x  xx   x xxxxxxxxxxxxxxxxxx xx',
  220. '      x   x x x x x x x x x xx  x  xxxxxxxxxxxxxxxxxx xx',
  221. '       x x x x x x x x x x  xx   x xxxxxxxxxxxxxxxxxx xx',
  222. '      x   x x x x x x x x x xx  x  xxxxxxxxxxxxxxxxxx xx',
  223. '       x x x x x x x x x x  xx   x xxxxxxxxxxxxxxxxxx xx',
  224. '      x   x x x x x x x x x xx  x  xxxxxxxxxxxxxxxxxx xx',
  225. '       x x x x x x x x x x  xx   x xxxxxxxxxxxxxxxxxx xx',
  226. '      x   x x x x x x x x x xx  x  xxxxxxxxxxxxxxxxxx xx',
  227. '       x x x x x x x x x x  xx   x xxxxxxxxxxxxxxxxxx xx',
  228. '      x   x x x x x x x x x xx  x  xxxxxxxxxxxxxxxxxx xx',
  229. '       x                     x   x                     x',
  230. '      x  xxxxxxxxxxxxxxxxxx     x  xxxxxxxxxxxxxxxxxx   ',
  231. '        xxxxxxxxxxxxxxxxxxxx      xxxxxxxxxxxxxxxxxxxx  ',
  232. '                                                        ');
  233.  
  234. value my_colors : color_table(black = 'o',white='.',white=' ');
  235. value my_picture : icon(color_table = my_colors,
  236. '                                              ',
  237. ' ............................................ ',
  238. ' ..........oo....................oo.......... ',
  239. ' .........oooo..................oooo......... ',
  240. ' ........oooooo................oooooo........ ',
  241. ' .......oo....oo..............oo....oo....... ',
  242. ' ......oo......oo............oo......oo...... ',
  243. ' .....oo........oo..........oo........oo..... ',
  244. ' ....oo..........oo........oo..........oo.... ',
  245. ' ...oo............oo......oo............oo... ',
  246. ' ..oo..............oo....oo..............oo.. ',
  247. ' .oo................oo..oo................oo. ',
  248. ' oooooooooooooooooooooooooooooooooooooooooooo ',
  249. ' oooooooooooooooooooooooooooooooooooooooooooo ',
  250. ' .........oooo..................oooo......... ',
  251. ' .........oooo..................oooo......... ',
  252. ' .........oooo..................oooo......... ',
  253. ' .........oooo..................oooo......... ',
  254. ' .........oooo..................oooo......... ',
  255. ' ............................................ ',
  256. ' ............................................ ',
  257. ' ............................................ ',
  258. ' ............................................ ',
  259. ' ..................oooooooo.................. ',
  260. ' ..................oooooooo.................. ',
  261. ' ............................................ ',
  262. ' ............................................ ',
  263. ' ............................................ ',
  264. ' ...........oo..................oo........... ',
  265. ' ............oo................oo............ ',
  266. ' .............oooooooooooooooooo............. ',
  267. ' ..............oooooooooooooooo.............. ',
  268. ' ............................................ ',
  269. ' ............................................ ',
  270. ' ............................................ ',
  271. '                                              ');
  272.  
  273.  
  274. list atomic_number_args : arguments {
  275.     XmNfontList = newcenturyschlbk_roman14;
  276.     XmNrightAttachment = XmATTACH_FORM;
  277.     XmNtopAttachment = XmATTACH_FORM;
  278.     XmNshadowThickness = 1;
  279. };
  280.  
  281. list element_name_args : arguments {
  282.     XmNfontList = newcenturyschlbk_roman14;
  283.     XmNshadowThickness = 1;
  284.     XmNleftAttachment = XmATTACH_FORM;
  285.     XmNrightAttachment = XmATTACH_FORM;
  286.     XmNbottomAttachment = XmATTACH_FORM;
  287.     XmNalignment = XmALIGNMENT_CENTER;
  288. };
  289.  
  290. list dialog_args : arguments {
  291.     XmNmarginWidth = 3;
  292.     XmNmarginHeight = 3;
  293.     XmNlabelFontList = dialog_font;
  294.     XmNtextFontList = newcenturyschlbk_roman12;
  295.     XmNshadowThickness = 1;
  296. };
  297.  
  298. list menus_args : arguments {
  299.     XmNfontList = hel_bold_font;
  300. };
  301.  
  302. !! Main
  303. !
  304. object
  305.     periodic_table_main : XmMainWindow {
  306.     arguments {
  307.         XmNx = 10;
  308.         XmNy = 10;
  309.         XmNwidth = 980;
  310.         XmNheight = 802;
  311.         XmNscrollingPolicy = XmAUTOMATIC;
  312.     };
  313.     controls {
  314.         XmMenuBar    menu_bar_1;
  315.         XmBulletinBoard    my_work_area;
  316. !        command        command_1;
  317.     };
  318.     };
  319.  
  320. object
  321.     my_work_area : XmBulletinBoard {
  322.         arguments {
  323.     XmNwidth = 500;
  324.     XmNheight = 500;
  325.     XmNborderWidth = 2;
  326.     XmNlabelFontList = hel_bold_font;
  327.         };
  328.     controls {
  329.         XmLabel        title_1;
  330.         XmLabel        title_2;
  331. !        label        title_version;
  332.  
  333.         XmLabel        heading_0;
  334.         XmLabel        heading_1;
  335.         XmLabel        heading_2;
  336.         XmLabel        heading_center;
  337.         XmLabel        heading_3;
  338.         XmLabel        heading_4;
  339.  
  340.         XmLabel        heading_legend;
  341.         XmLabel        legend_arrow_1;
  342.         XmLabel        legend_arrow_2;
  343.         XmLabel        legend_arrow_3;
  344.         XmLabel        legend_text_1;
  345.         XmLabel        legend_text_2;
  346.         XmLabel        legend_text_3;
  347.         XmFrame        frame_legend;
  348.  
  349.         XmFrame        frame_11;
  350.         XmFrame        frame_12;
  351.         XmFrame        frame_13;
  352.         XmFrame        frame_14;
  353.         XmFrame        frame_15;
  354.  
  355.         XmFrame        frame_22;
  356.         XmFrame        frame_23;
  357.         XmFrame        frame_24;
  358.         XmFrame        frame_25;
  359.  
  360.         XmFrame        frame_file_selection;
  361.  
  362.         XmFrame        frame_33;
  363.         XmFrame        frame_34;
  364.         XmFrame        frame_35;
  365.  
  366.         XmFrame        frame_42;
  367.         XmFrame        frame_43;
  368.         XmFrame        frame_44;
  369. !        frame        frame_45;
  370.  
  371.         XmFrame        frame_dialog_1;
  372.         XmFrame        frame_dialog_2;
  373.         XmFrame        frame_dialog_3;
  374.         XmFrame        frame_dialog_4;
  375.         XmFrame        frame_dialog_5;
  376.     };
  377. };
  378.  
  379. object
  380.     title_version: XmLabel {
  381.     arguments {
  382.     XmNx = 718;
  383.     XmNy = 62;
  384.     XmNfontList = newcenturyschlbk_roman12;
  385.     XmNlabelString = "V1.1";
  386.     };
  387.     };
  388.  
  389. object
  390.     title_1: XmLabel {
  391.     arguments {
  392.     XmNx = title_x;
  393.     XmNy = title_y;
  394.     XmNfontList = newcenturyschlbk_bold24;
  395.     XmNlabelString = "The Periodic Table of Motif Widgets";
  396.     };
  397.     };
  398.  
  399. object
  400.     title_2: XmLabel {
  401.     arguments {
  402.     XmNx = subtitle_x;
  403.     XmNy = subtitle_y;
  404.     XmNfontList = subtitle_font;
  405.     XmNlabelString = "Open Software Foundation, Inc. - August 1990";
  406.     };
  407.     };
  408.  
  409. object
  410.     heading_0: XmLabel {
  411.     arguments {
  412.     XmNx = radioactive_title_x;
  413.     XmNy = radioactive_title_y;
  414.     XmNfontList = newcenturyschlbk_roman14;
  415.     XmNlabelString = compound_string('*Dialog',separate=true)
  416.                         & 'Boxes';
  417.     XmNalignment = XmALIGNMENT_END;
  418.     };
  419.     };
  420.  
  421.  
  422. !! LEGEND
  423. !
  424. object
  425.     heading_legend: XmLabel {
  426.     arguments {
  427.     XmNx = legend_x - 55;
  428.     XmNy = legend_y + 15;
  429.     XmNfontList = newcenturyschlbk_bold14;
  430. !    label_string = "Legend";
  431.     XmNlabelString =  compound_string('Key',separate=true) &
  432.             compound_string('To',separate=true)
  433.                         & 'Chart';
  434.     XmNalignment = XmALIGNMENT_END;
  435.     };
  436.     };
  437.  
  438. object
  439.     legend_text_1: XmLabel {
  440.     arguments {
  441.     XmNx = legend_x + 118;
  442.     XmNy = legend_y + 3;
  443.     XmNfontList = newcenturyschlbk_roman12;
  444.     XmNlabelString = "Atomic Number";
  445.     XmNalignment = XmALIGNMENT_CENTER;
  446.     };
  447.     };
  448.  
  449. object
  450.     legend_text_2: XmLabel {
  451.     arguments {
  452.     XmNx = legend_x + 118;
  453.     XmNy = legend_y + 33;
  454.     XmNfontList = newcenturyschlbk_roman12;
  455.     XmNlabelString = "Actual Widget";
  456.     XmNalignment = XmALIGNMENT_CENTER;
  457.     };
  458.     };
  459.  
  460. object
  461.     legend_text_3: XmLabel {
  462.     arguments {
  463.     XmNx = legend_x + 118;
  464.     XmNy = legend_y + 73;
  465.     XmNfontList = newcenturyschlbk_roman12;
  466.     XmNlabelString = "Widget Name";
  467.     XmNalignment = XmALIGNMENT_CENTER;
  468.     };
  469.     };
  470.  
  471. object
  472.     legend_arrow_1 : XmLabel {
  473.     arguments {
  474.     XmNx = legend_x + 105;
  475.     XmNy = legend_y + 5;
  476.     XmNfontList = var_font;
  477.     XmNlabelString = "_";
  478.     };
  479.     };
  480.  
  481. object
  482.     legend_arrow_2 : XmLabel {
  483.     arguments {
  484.     XmNx = legend_x + 105;
  485.     XmNy = legend_y + 35;
  486.     XmNfontList = var_font;
  487.     XmNlabelString = "_";
  488.     };
  489.     };
  490.  
  491. object
  492.     legend_arrow_3 : XmLabel {
  493.     arguments {
  494.     XmNx = legend_x + 105;
  495.     XmNy = legend_y + 75;
  496.     XmNfontList = var_font;
  497.     XmNlabelString = "_";
  498.     };
  499.     };
  500.  
  501. object
  502.     frame_legend: XmFrame {
  503.     arguments {
  504.     XmNx = legend_x;
  505.     XmNy = legend_y;
  506.     };
  507.     controls {
  508.         XmForm {
  509.             arguments {
  510.         XmNwidth = element_width;
  511.         XmNheight = element_height - fudge;
  512.             };
  513.         controls {
  514.             XmSeparator    separator_1;
  515.             XmLabel {
  516.             arguments {
  517.                 arguments atomic_number_args;
  518.                 XmNlabelString = '1';
  519.             };
  520.             };
  521.             XmPushButton {
  522.             arguments {
  523.                 arguments element_name_args;
  524.                 XmNlabelString = 'separator';
  525.             };
  526.             };
  527.         };
  528.         };
  529.     };
  530.     };
  531.  
  532. !! COLUMN ONE
  533. !
  534. object
  535.     heading_1: XmLabel {
  536.     arguments {
  537.     XmNx = table_origin_x + heading_fudge_x;
  538.     XmNy = table_origin_y - heading_fudge_y;
  539.     XmNfontList = heading_font;
  540.     XmNlabelString = "Ia";
  541.     XmNalignment = XmALIGNMENT_CENTER;
  542.     };
  543.     };
  544.  
  545. object
  546.     frame_11: XmFrame {
  547.     arguments {
  548.     XmNx = table_origin_x;
  549.     XmNy = table_origin_y;
  550.     };
  551.     controls {
  552.         XmForm {
  553.             arguments {
  554.         XmNwidth = element_width;
  555.         XmNheight = element_height - fudge;
  556.             };
  557.         controls {
  558.             XmSeparator    separator_1;
  559.             XmLabel {
  560.             arguments {
  561.                 arguments atomic_number_args;
  562.                 XmNlabelString = '1';
  563.             };
  564.             };
  565.             XmPushButton {
  566.             arguments {
  567.                 arguments element_name_args;
  568.                 XmNlabelString = 'separator';
  569.             };
  570.             };
  571.         };
  572.         };
  573.     };
  574. };
  575.  
  576. !%%%%%%%%%%
  577. object
  578.     frame_12: XmFrame {
  579.     arguments {
  580.     XmNx = table_origin_x;
  581.     XmNy = table_origin_y + (element_height * 1);
  582.     };
  583.     controls {
  584.         XmForm {
  585.             arguments {
  586.         XmNwidth = element_width;
  587.         XmNheight = element_height;
  588.             };
  589.         controls {
  590.             XmArrowButton    arrow_button_1;
  591.             XmLabel {
  592.             arguments {
  593.                 arguments atomic_number_args;
  594.                 XmNlabelString = '2';
  595.             };
  596.             };
  597.             XmPushButton {
  598.             arguments {
  599.                 arguments element_name_args;
  600.                 XmNlabelString = 'arrow button';
  601.             };
  602.             };
  603.         };
  604.         };
  605.     };
  606. };
  607.  
  608. !%%%%%%%%%%
  609. object
  610.     frame_13: XmFrame {
  611.     arguments {
  612.     XmNx = table_origin_x;
  613.     XmNy = table_origin_y + (element_height * 2);
  614.     };
  615.     controls {
  616.         XmForm {
  617.             arguments {
  618.         XmNwidth = element_width;
  619.         XmNheight = element_height;
  620.             };
  621.         controls {
  622.             XmPushButton    push_button_1;
  623.             XmLabel {
  624.             arguments {
  625.                 arguments atomic_number_args;
  626.                 XmNlabelString = '3';
  627.             };
  628.             };
  629.             XmPushButton {
  630.             arguments {
  631.                 arguments element_name_args;
  632.                 XmNlabelString = 'pushbutton';
  633.             };
  634.             };
  635.         };
  636.         };
  637.     };
  638. };
  639.  
  640. !%%%%%%%%%%
  641. object
  642.     frame_14: XmFrame {
  643.     arguments {
  644.     XmNx = table_origin_x;
  645.     XmNy = table_origin_y + (element_height * 3);
  646.     };
  647.     controls {
  648.         XmForm {
  649.             arguments {
  650.         XmNwidth = element_width;
  651.         XmNheight = element_height;
  652.             };
  653.         controls {
  654.             XmToggleButton    toggle_button_1;
  655.             XmLabel {
  656.             arguments {
  657.                 arguments atomic_number_args;
  658.                 XmNlabelString = '4';
  659.             };
  660.             };
  661.             XmPushButton {
  662.             arguments {
  663.                 arguments element_name_args;
  664.                 XmNlabelString = 'togglebutton';
  665.             };
  666.             };
  667.         };
  668.         };
  669.     };
  670. };
  671.  
  672. object
  673.     frame_15: XmFrame {
  674.     arguments {
  675.     XmNx = table_origin_x;
  676.     XmNy = table_origin_y + (element_height * 4);
  677.     };
  678.     controls {
  679.         XmForm {
  680.             arguments {
  681.         XmNwidth = element_width;
  682.         XmNheight = element_height;
  683.             };
  684.         controls {
  685.             XmLabel    label_1;
  686.             XmLabel {
  687.             arguments {
  688.                 arguments atomic_number_args;
  689.                 XmNlabelString = '5';
  690.             };
  691.             };
  692.             XmPushButton {
  693.             arguments {
  694.                 arguments element_name_args;
  695.                 XmNlabelString = 'label';
  696.             };
  697.             };
  698.         };
  699.         };
  700.     };
  701. };
  702.  
  703.  
  704. !! COLUMN TWO
  705. !
  706. object
  707.     heading_2: XmLabel {
  708.     arguments {
  709.     XmNx = table_origin_x + (element_width * 1) + heading_fudge_x;
  710.     XmNy = table_origin_y  + (element_height * 1) - heading_fudge_y;
  711.     XmNfontList = heading_font;
  712.     XmNlabelString = "IIa";
  713.     XmNalignment = XmALIGNMENT_CENTER;
  714.     };
  715.     };
  716.  
  717. object
  718.     frame_22: XmFrame {
  719.     arguments {
  720.     XmNx = table_origin_x + (element_width * 1);
  721.     XmNy = table_origin_y + (element_height * 1);
  722.     };
  723.     controls {
  724.         XmForm {
  725.             arguments {
  726.         XmNwidth = element_width;
  727.         XmNheight = element_height;
  728.             };
  729.         controls {
  730.             XmOptionMenu    option_menu_1;
  731.             XmLabel {
  732.             arguments {
  733.                 arguments atomic_number_args;
  734.                 XmNlabelString = '6';
  735.             };
  736.             };
  737.             XmPushButton {
  738.             arguments {
  739.                 XmNleftOffset = 2;
  740.                 arguments element_name_args;
  741.                 XmNlabelString = 'option menu';
  742.             };
  743.             };
  744.         };
  745.         };
  746.     };
  747. };
  748.  
  749. object
  750.     frame_23: XmFrame {
  751.     arguments {
  752.     XmNx = table_origin_x + (element_width * 1);
  753.     XmNy = table_origin_y + (element_height * 2);
  754.     };
  755.     controls {
  756.         XmForm {
  757.             arguments {
  758.         XmNwidth = element_width;
  759.         XmNheight = element_height;
  760.             };
  761.         controls {
  762.             XmScale    scale_1;
  763.             XmLabel {
  764.             arguments {
  765.                 arguments atomic_number_args;
  766.                 XmNlabelString = '7';
  767.             };
  768.             };
  769.             XmPushButton {
  770.             arguments {
  771.                 XmNleftOffset = 2;
  772.                 arguments element_name_args;
  773.                 XmNlabelString = 'scale';
  774.             };
  775.             };
  776.         };
  777.         };
  778.     };
  779. };
  780.  
  781. object
  782.     frame_24: XmFrame {
  783.     arguments {
  784.     XmNx = table_origin_x + (element_width * 1);
  785.     XmNy = table_origin_y + (element_height * 3);
  786.     };
  787.     controls {
  788.         XmForm {
  789.             arguments {
  790.         XmNwidth = element_width;
  791.         XmNheight = element_height;
  792.             };
  793.         controls {
  794.             XmRadioBox    radio_box_1;
  795.             XmLabel {
  796.             arguments {
  797.                 arguments atomic_number_args;
  798.                 XmNlabelString = '8';
  799.             };
  800.             };
  801.             XmPushButton {
  802.             arguments {
  803.                 XmNleftOffset = 2;
  804.                 arguments element_name_args;
  805.                 XmNlabelString = 'radio box';
  806.             };
  807.             };
  808.         };
  809.         };
  810.     };
  811. };
  812.  
  813. object
  814.     frame_25: XmFrame {
  815.     arguments {
  816.     XmNx = table_origin_x + (element_width * 1);
  817.     XmNy = table_origin_y + (element_height * 4);
  818.     };
  819.     controls {
  820.         XmForm {
  821.             arguments {
  822.         XmNwidth = element_width;
  823.         XmNheight = element_height;
  824.             };
  825.         controls {
  826.             XmText    text_1;
  827.             XmLabel {
  828.             arguments {
  829.                 arguments atomic_number_args;
  830.                 XmNlabelString = '9';
  831.             };
  832.             };
  833.             XmPushButton {
  834.             arguments {
  835.                 XmNleftOffset = 2;
  836.                 arguments element_name_args;
  837.                 XmNlabelString = 'text edit';
  838.             };
  839.             };
  840.         };
  841.         };
  842.     };
  843. };
  844.  
  845. !! COLUMN THREE
  846. !
  847. object
  848.     heading_3: XmLabel {
  849.     arguments {
  850.     XmNx = centre_box_x + centre_box_width + heading_fudge_x - 5;
  851.     XmNy = table_origin_y + (element_height * 2) + fudge - heading_fudge_y;
  852.     XmNfontList = heading_font;
  853.     XmNlabelString = "IVa";
  854.     XmNalignment = XmALIGNMENT_CENTER;
  855.     };
  856.     };
  857.  
  858. object
  859.     frame_33: XmFrame {
  860.     arguments {
  861.     XmNx = centre_box_x + centre_box_width + fudge;
  862.     XmNy = table_origin_y + (element_height * 2) + fudge;
  863.     };
  864.     controls {
  865.         XmForm {
  866.             arguments {
  867.         XmNwidth = element_width - fudge;
  868.         XmNheight = element_height - fudge;
  869.             };
  870.         controls {
  871.             XmScrollBar    scrollbar_1;
  872.             XmLabel {
  873.             arguments {
  874.                 arguments atomic_number_args;
  875.                 XmNlabelString = '11';
  876.             };
  877.             };
  878.             XmPushButton {
  879.             arguments {
  880.                 arguments element_name_args;
  881.                 XmNlabelString = 'scroll bar';
  882.             };
  883.             };
  884.         };
  885.         };
  886.     };
  887. };
  888.  
  889. object
  890.     frame_34: XmFrame {
  891.     arguments {
  892.     XmNx = centre_box_x + centre_box_width + fudge;
  893.     XmNy = table_origin_y + (element_height * 3);
  894.     };
  895.     controls {
  896.         XmForm {
  897.             arguments {
  898.         XmNwidth = element_width - fudge;
  899.         XmNheight = element_height - fudge;
  900.             };
  901.         controls {
  902.             XmFrame {
  903.             arguments {
  904.                 XmNx = 11;
  905.                 XmNy = 12;
  906.             };
  907.             controls {
  908.                 XmScrolledList list_box_1;
  909.             };
  910.             };
  911.             XmLabel {
  912.             arguments {
  913.                 arguments atomic_number_args;
  914.                 XmNlabelString = '12';
  915.             };
  916.             };
  917.             XmPushButton {
  918.             arguments {
  919.                 arguments element_name_args;
  920.                 XmNlabelString = 'scrolled list';
  921.             };
  922.             };
  923.         };
  924.         };
  925.     };
  926. };
  927.  
  928. object
  929.     frame_35: XmFrame {
  930.     arguments {
  931.     XmNx = centre_box_x + centre_box_width + fudge;
  932.     XmNy = table_origin_y + (element_height * 4);
  933.     };
  934.     controls {
  935.         XmForm {
  936.             arguments {
  937.         XmNwidth = element_width * 2;
  938.         XmNheight = element_height;
  939.             };
  940.         controls {
  941.             XmFrame {
  942.             arguments {
  943.                 XmNx = 7;
  944.                 XmNy = 0;
  945.                 XmNwidth = 100;
  946.             };
  947.             controls {
  948.                 XmPanedWindow paned_window_1;
  949.             };
  950.             };
  951.             XmLabel {
  952.             arguments {
  953.                 arguments atomic_number_args;
  954.                 XmNlabelString = '16';
  955.             };
  956.             };
  957.             XmPushButton {
  958.             arguments {
  959.                 arguments element_name_args;
  960.                 XmNlabelString = 'paned window';
  961.             };
  962.             };
  963.         };
  964.         };
  965.     };
  966. };
  967.  
  968. !! COLUMN FOUR
  969. !
  970. object
  971.     heading_4: XmLabel {
  972.     arguments {
  973.     XmNx = centre_box_x + centre_box_width + element_width + heading_fudge_x;
  974.     XmNy = table_origin_y + (element_height * 1) - heading_fudge_y;
  975.     XmNfontList = heading_font;
  976.     XmNlabelString = "Va";
  977.     XmNalignment = XmALIGNMENT_CENTER;
  978.     };
  979.     };
  980.  
  981. object
  982.     frame_42: XmFrame {
  983.     arguments {
  984.     XmNx = centre_box_x + centre_box_width + element_width + fudge;
  985.     XmNy = table_origin_y + (element_height * 1);
  986.     };
  987.     controls {
  988.         XmForm {
  989.             arguments {
  990.         XmNwidth = element_width;
  991.         XmNheight = element_height;
  992.             };
  993.         controls {
  994.             XmFrame popup_menu_1;
  995.             XmLabel {
  996.             arguments {
  997.                 arguments atomic_number_args;
  998.                 XmNlabelString = '13';
  999.             };
  1000.             };
  1001.             XmPushButton {
  1002.             arguments {
  1003.                 arguments element_name_args;
  1004.                 XmNlabelString = 'popup menu';
  1005.             };
  1006.             };
  1007.         };
  1008.         };
  1009.     };
  1010. };
  1011.  
  1012. object
  1013.     frame_43: XmFrame {
  1014.     arguments {
  1015.     XmNx = centre_box_x + centre_box_width + element_width + fudge;
  1016.     XmNy = table_origin_y + (element_height * 2);
  1017.     };
  1018.     controls {
  1019.         XmForm {
  1020.             arguments {
  1021.         XmNwidth = element_width;
  1022.         XmNheight = element_height;
  1023.             };
  1024.         controls {
  1025.             XmFrame draw_area_1;
  1026.             XmLabel {
  1027.             arguments {
  1028.                 arguments atomic_number_args;
  1029.                 XmNlabelString = '14';
  1030.             };
  1031.             };
  1032.             XmPushButton {
  1033.             arguments {
  1034.                 arguments element_name_args;
  1035.                 XmNlabelString = 'drawing area';
  1036.             };
  1037.             };
  1038.         };
  1039.         };
  1040.     };
  1041. };
  1042.  
  1043. object
  1044.     frame_44: XmFrame {
  1045.     arguments {
  1046.     XmNx = centre_box_x + centre_box_width + element_width + fudge;
  1047.     XmNy = table_origin_y + (element_height * 3);
  1048.     };
  1049.     controls {
  1050.         XmForm {
  1051.             arguments {
  1052.         XmNwidth = element_width;
  1053.         XmNheight = element_height;
  1054.             };
  1055.         controls {
  1056.             XmDrawnButton drawn_button_1;
  1057.             XmLabel {
  1058.             arguments {
  1059.                 arguments atomic_number_args;
  1060.                 XmNlabelString = '15';
  1061.             };
  1062.             };
  1063.             XmPushButton {
  1064.             arguments {
  1065.                 XmNbottomOffset = 2;
  1066.                 arguments element_name_args;
  1067.                 XmNlabelString = 'drawnbutton';
  1068.             };
  1069.             };
  1070.         };
  1071.         };
  1072.     };
  1073. };
  1074.  
  1075. object
  1076.     frame_45: XmFrame {
  1077.     arguments {
  1078.     XmNx = centre_box_x + centre_box_width + element_width + fudge;
  1079.     XmNy = table_origin_y + (element_height * 4);
  1080.     };
  1081.     controls {
  1082.         XmForm {
  1083.             arguments {
  1084.         XmNwidth = element_width;
  1085.         XmNheight = element_height;
  1086.             };
  1087.         controls {
  1088.             XmFrame {
  1089.             arguments {
  1090.                 XmNx = 13;
  1091.                 XmNy = 23;
  1092.             };
  1093.             controls {
  1094.                 XmScrolledList list_box_1;
  1095.             };
  1096.             };
  1097.             XmLabel {
  1098.             arguments {
  1099.                 arguments atomic_number_args;
  1100.                 XmNlabelString = '16';
  1101.             };
  1102.             };
  1103.             XmPushButton {
  1104.             arguments {
  1105.                 arguments element_name_args;
  1106.                 XmNlabelString = 'list box';
  1107.             };
  1108.             };
  1109.         };
  1110.         };
  1111.     };
  1112. };
  1113.  
  1114. !! CENTRE FILE SELECTION
  1115. !
  1116. object
  1117.     heading_center: XmLabel {
  1118.     arguments {
  1119.     XmNx = centre_box_x + (centre_box_width/2);
  1120.     XmNy = centre_box_y - heading_fudge_y;
  1121.     XmNfontList = heading_font;
  1122.     XmNlabelString = "IIIb";
  1123.     XmNalignment = XmALIGNMENT_CENTER;
  1124.     };
  1125.     };
  1126.  
  1127. object
  1128.     frame_file_selection: XmFrame {
  1129.     arguments {
  1130.     XmNx = centre_box_x;
  1131.     XmNy = centre_box_y;
  1132.     XmNmarginWidth = 0;
  1133.     XmNmarginHeight = 0;
  1134.     };
  1135.     controls {
  1136.         XmForm {
  1137.         arguments {
  1138.             XmNwidth = centre_box_width;
  1139.             XmNheight = centre_box_height;
  1140.         XmNresizePolicy = XmRESIZE_NONE;
  1141.             };
  1142.         controls {
  1143.             XmFrame    file_selection_box_1;
  1144.         XmLabel {
  1145.             arguments {
  1146.             arguments atomic_number_args;
  1147.                 XmNlabelString = '10';
  1148.             };
  1149.         };
  1150.         XmPushButton {
  1151.             arguments {
  1152.             arguments element_name_args;
  1153.                 XmNlabelString = 'file selection*';
  1154.             };
  1155.         };
  1156.         };
  1157.     };
  1158.     };
  1159. };
  1160.  
  1161.     !! DIALOGS
  1162. !
  1163. object
  1164.     frame_dialog_1: XmFrame {
  1165.     arguments {
  1166.     XmNx = radioactive_x;
  1167.     XmNy = radioactive_y;
  1168. !    shadow_thickness = 1;
  1169.     };
  1170.     controls {
  1171.     XmMessageBox    message_box_1;
  1172.     };
  1173. };
  1174.  
  1175. object
  1176.     frame_dialog_2: XmFrame {
  1177.     arguments {
  1178.     XmNx = radioactive_x + (radioactive_width * 1) - 5;
  1179.     XmNy = radioactive_y;
  1180. !    shadow_thickness = 3;
  1181.     };
  1182.     controls {
  1183.     XmMessageBox    message_box_2;
  1184.     };
  1185. };
  1186.  
  1187. object
  1188.     frame_dialog_3: XmFrame {
  1189.     arguments {
  1190.     XmNx = radioactive_x + (radioactive_width * 2) - 15;
  1191.     XmNy = radioactive_y;
  1192. !    shadow_thickness = 3;
  1193.     };
  1194.     controls {
  1195.     XmMessageBox    message_box_4;
  1196.     };
  1197. };
  1198.  
  1199. object
  1200.     frame_dialog_4: XmFrame {
  1201.     arguments {
  1202.     XmNx = radioactive_x + (radioactive_width * 3) - 25;
  1203.     XmNy = radioactive_y;
  1204. !    shadow_thickness = 3;
  1205.     };
  1206.     controls {
  1207.     XmMessageBox    message_box_5;
  1208.     };
  1209. };
  1210.  
  1211. object
  1212.     frame_dialog_5: XmFrame {
  1213.     arguments {
  1214.     XmNx = radioactive_x + (radioactive_width * 4) - 35;
  1215.     XmNy = radioactive_y;
  1216. !    shadow_thickness = 3;
  1217.     };
  1218.     controls {
  1219.     XmMessageBox    message_box_6;
  1220.     };
  1221. };
  1222.  
  1223. object
  1224.     open_dialog: XmQuestionDialog {
  1225.         arguments {
  1226.         arguments dialog_args;
  1227.         XmNmessageString = compound_string('What are you',separate=true)
  1228.                         & 'looking in here for?';
  1229.         };
  1230. };
  1231.  
  1232. !%% Display Widgets
  1233. !%%
  1234. object
  1235.     separator_1 : XmSeparator {
  1236.     arguments {
  1237.     XmNwidth = 80;
  1238.     XmNx = 10;
  1239.     XmNy = 40;
  1240.     XmNorientation = XmHORIZONTAL;
  1241.     XmNshadowThickness = 4;
  1242.     };
  1243.     };
  1244.  
  1245. object
  1246.     arrow_button_1 : XmArrowButton {
  1247.     arguments {
  1248.     XmNx = 25;
  1249.     XmNy = 20;
  1250.     XmNwidth = 50;
  1251.     XmNheight = 50;
  1252.     XmNarrowDirection = XmARROW_UP;
  1253.     };
  1254.     };
  1255.  
  1256. object
  1257.     toggle_button_1 : XmToggleButton {
  1258.     arguments {
  1259.     XmNx = 20;
  1260.     XmNy = 30;
  1261.     XmNfontList = hel_bold_font;
  1262.     XmNlabelString = 'Lights';
  1263.     XmNshadowThickness = 1;
  1264.     };
  1265.     callbacks {
  1266.             MrmNcreateCallback = procedure create_callback (K_togglebutton_widget);
  1267.     };
  1268.     };
  1269.  
  1270. object
  1271.     push_button_1 : XmPushButton {
  1272.     arguments {
  1273.     XmNx = 22;
  1274.     XmNy = 25;
  1275.     XmNfontList = hel_bold_font;
  1276.     XmNlabelString = compound_string('Explode',separate=true) & 'Building';
  1277. !    shadow_thickness = 1;
  1278.     };
  1279.     };
  1280.  
  1281. object
  1282.     drawn_button_1 : XmDrawnButton {
  1283.     arguments {
  1284.     XmNx = 15;
  1285.     XmNy = 10;
  1286.     XmNmarginWidth = 0;
  1287.     XmNmarginHeight = 0;
  1288.     XmNwidth = 62;
  1289.     XmNheight = 62;
  1290. !    XmNshadowThickness = 2;
  1291.     XmNbackgroundPixmap = motif_icon;
  1292.     XmNpushButtonEnabled = true;
  1293.     };
  1294.     callbacks {
  1295.         XmNactivateCallback = procedure foo_activate ();
  1296.             MrmNcreateCallback = procedure create_callback (K_drawnbutton_widget);
  1297.     };
  1298.     };
  1299.  
  1300. object
  1301.     label_1 : XmLabel {
  1302.     arguments {
  1303.     XmNx = dont_panic_x;
  1304.     XmNy = dont_panic_y;
  1305.     XmNfontList = times_bold_font;
  1306.     XmNlabelString = compound_string("DON'T",separate=true) & "PANIC";
  1307.     };
  1308.     };
  1309.  
  1310. object
  1311.     scrollbar_1 : XmScrollBar {
  1312.     arguments {
  1313.     XmNx = 10;
  1314.     XmNy = 30;
  1315.     XmNwidth = 75;
  1316.     XmNorientation = XmHORIZONTAL;
  1317.     XmNvalue = 20;
  1318.     };
  1319.     };
  1320.  
  1321. object    text_1 : XmText {
  1322.         arguments {
  1323.     XmNx = 15;
  1324.     XmNy = 25;
  1325. !    width = 70;
  1326. !    height = 40;
  1327.     XmNcolumns = 10;
  1328.     XmNrows = 2;
  1329.         XmNvalue = 'helloworld';
  1330.     XmNresizeWidth = false;
  1331.     XmNresizeHeight = false;
  1332.     XmNeditMode = XmMULTI_LINE_EDIT;
  1333. !    XmNscrollVertical = true;
  1334. !    scroll_horizontal = false;
  1335.         };
  1336.     };
  1337.  
  1338. object
  1339.     draw_area_1 : XmFrame {
  1340.         arguments {
  1341.         XmNx = 20;
  1342.         XmNy = 20;
  1343.         XmNwidth = 75;
  1344.         XmNheight = 45;
  1345.         XmNshadowThickness = 2;
  1346.     };
  1347.     controls {
  1348.         XmLabel {
  1349.         arguments {
  1350.         XmNmarginWidth = 2;
  1351.         XmNmarginHeight = 2;
  1352.         XmNlabelType = XmPIXMAP;
  1353.         XmNlabelPixmap = my_picture;
  1354. !        label_string = compound_string('Insert Picture',separate=true) & '->Here<-';
  1355.         };
  1356.         };
  1357.     };
  1358.     };
  1359.  
  1360. object
  1361.     popup_menu_1 : XmFrame {
  1362.         arguments {
  1363.         XmNx = 5;
  1364.         XmNy = 25;
  1365. !        width = 50;
  1366. !        height = 70;
  1367.         XmNshadowThickness = 2;
  1368.     };
  1369.     controls {
  1370.         XmLabel {
  1371.         arguments {
  1372.         XmNfontList = fixed_font;
  1373.         XmNlabelString = compound_string('Press MB3 for',separate=true) & 'Popup Menu';
  1374.         };
  1375.         };
  1376.     };
  1377.     callbacks {
  1378.                MrmNcreateCallback = procedure create_callback (K_popup_menu_widget);
  1379.     };
  1380.     };
  1381.  
  1382. object
  1383.     paned_window_1 : XmPanedWindow {
  1384.         arguments {
  1385. !    x = 10;
  1386. !    y = 5;
  1387. !    width = 150;
  1388.     };
  1389.     controls {
  1390.         XmText    paned_text_1;
  1391.         XmText    paned_text_2;
  1392.     };
  1393.     };
  1394.  
  1395. object
  1396.     paned_text_1 : XmText {
  1397.         arguments {
  1398. !    x = 15;
  1399. !    y = 25;
  1400. !    width = 70;
  1401. !    height = 40;
  1402. !    XmNfontList = small_font;
  1403.     XmNcolumns = 24;
  1404.     XmNrows = 1;
  1405.         XmNvalue = 'OPEN Software Foundation';
  1406.     XmNresizeWidth = false;
  1407.     XmNresizeHeight = false;
  1408.     XmNeditMode = XmMULTI_LINE_EDIT;
  1409. !    XmNscrollVertical = true;
  1410. !    scroll_horizontal = false;
  1411.         };
  1412.     callbacks {
  1413.             MrmNcreateCallback = procedure create_callback (K_vtext1_widget);
  1414.     };
  1415.     };
  1416.  
  1417. object
  1418.     paned_text_2 : XmText {
  1419.         arguments {
  1420. !    x = 15;
  1421. !    y = 25;
  1422. !    width = 70;
  1423. !    height = 40;
  1424. !    XmNfontList = small_font;
  1425.     XmNcolumns = 24;
  1426.     XmNrows = 1;
  1427.         XmNvalue = 'Motif Version 1.1';
  1428.     XmNresizeWidth = false;
  1429.     XmNresizeHeight = false;
  1430.     XmNeditMode = XmMULTI_LINE_EDIT;
  1431. !    XmNscrollVertical = true;
  1432. !    scroll_horizontal = false;
  1433.         };
  1434.     callbacks {
  1435.             MrmNcreateCallback = procedure create_callback (K_vtext2_widget);
  1436.     };
  1437.     };
  1438.  
  1439. !%% Container Widgets
  1440. !%%
  1441. object
  1442.     scale_1 : XmScale {
  1443.         arguments {
  1444.     XmNx = 3;
  1445.     XmNy = 25;
  1446.     XmNwidth = 95;
  1447. !    XmNheight = 50;
  1448.     XmNfontList = hel_bold_font;
  1449.         XmNborderWidth = 0;
  1450.         XmNvalue = 42;
  1451.         XmNmaximum = 42;
  1452.         XmNminimum = 0;
  1453.         XmNshowValue = true;
  1454.         XmNorientation = XmHORIZONTAL;
  1455.     XmNprocessingDirection = XmMAX_ON_RIGHT;
  1456.         };
  1457.     callbacks {
  1458.             MrmNcreateCallback = procedure create_callback (K_scale_widget);
  1459.     };
  1460.     };
  1461.  
  1462. object
  1463.     radio_box_1 : XmRadioBox {
  1464.         arguments {
  1465.     XmNx = 20;
  1466.     XmNy = 8;
  1467.     XmNspacing = 2;
  1468.     XmNmarginHeight = 0;
  1469.     XmNmarginWidth = 0;
  1470.         };
  1471.         controls {
  1472.     XmToggleButton    radio_button_1;
  1473.     XmToggleButton    radio_button_2;
  1474.     XmToggleButton    radio_button_3;
  1475.         };
  1476.     };
  1477.     radio_button_1 : XmToggleButton {
  1478.     arguments {
  1479.     XmNmarginHeight = 0;
  1480.     XmNmarginWidth = 0;
  1481.     XmNfontList = newcenturyschlbk_roman12;
  1482.     XmNlabelString = 'WFNX';
  1483.     XmNset = true;
  1484.     };
  1485.     };
  1486.     radio_button_2 : XmToggleButton {
  1487.     arguments {
  1488.     XmNmarginHeight = 0;
  1489.     XmNmarginWidth = 0;
  1490.     XmNfontList = newcenturyschlbk_roman12;
  1491.     XmNlabelString = 'WCRB';
  1492.     };
  1493.     };
  1494.     radio_button_3 : XmToggleButton {
  1495.     arguments {
  1496.     XmNmarginHeight = 0;
  1497.     XmNmarginWidth = 0;
  1498.     XmNfontList = newcenturyschlbk_roman12;
  1499.     XmNlabelString = 'WHKY';
  1500.     };
  1501.     };
  1502.  
  1503. !%% Dialog Widgets
  1504. !%%
  1505. object
  1506.     message_box_1 : XmMessageBox {
  1507.         arguments {
  1508.         arguments dialog_args;
  1509.         XmNmessageString = compound_string('Swap Error...',separate=true)
  1510.                         & 'You Lose Your Mind.';
  1511.         XmNdialogType = XmDIALOG_ERROR;
  1512.         };
  1513.     };
  1514. object
  1515.     message_box_2 : XmMessageBox {
  1516.         arguments {
  1517.         arguments dialog_args;
  1518.         XmNmessageString = compound_string('Information is',separate=true)
  1519.                         & 'Power.';
  1520.         XmNdialogType = XmDIALOG_INFORMATION;
  1521.         };
  1522.     };
  1523. object
  1524.     message_box_3 : XmMessageBox {
  1525.         arguments {
  1526.         arguments dialog_args;
  1527.         XmNmessageString = compound_string('Swedish',separate=true)
  1528.                         & 'Massage';
  1529.         XmNdialogType = XmDIALOG_MESSAGE;
  1530.         };
  1531.     };
  1532. object
  1533.     message_box_4 : XmMessageBox {
  1534.         arguments {
  1535.         arguments dialog_args;
  1536.         XmNmessageString = compound_string('Question authority...',separate=true)
  1537.                         & 'But raise your hand first.';
  1538.         XmNdialogType = XmDIALOG_QUESTION;
  1539.         };
  1540.     };
  1541. object
  1542.     message_box_5 : XmMessageBox {
  1543.         arguments {
  1544.         arguments dialog_args;
  1545.         XmNmessageString = compound_string('Warning, Warning,',separate=true)
  1546.                         & 'Danger Dr. Smith...';
  1547.         XmNdialogType = XmDIALOG_WARNING;
  1548.         };
  1549.     };
  1550. object
  1551.     message_box_6 : XmMessageBox {
  1552.         arguments {
  1553.         arguments dialog_args;
  1554.         XmNmessageString = compound_string('Work in Progress',separate=true)
  1555.                         & 'Meditating.....';
  1556.         XmNdialogType = XmDIALOG_WORKING;
  1557.         };
  1558.     };
  1559.  
  1560. object
  1561.     command_1 : XmCommand {
  1562.         arguments {
  1563.     XmNwidth = 150;
  1564.     XmNheight = 80;
  1565.     XmNhistoryVisibleItemCount = 1;
  1566. !    resize_policy = 1;
  1567.         };
  1568.     };
  1569.  
  1570. !object
  1571. !    selection_box_1 : selection_dialog {
  1572. !        arguments {
  1573. !    style = 0;
  1574. !!            resizable = true;
  1575. !!            default_position = true;
  1576. !        };
  1577. !    };
  1578.  
  1579. object
  1580.     file_selection_box_1 : XmFrame {
  1581.         arguments {
  1582.     XmNx = 25;
  1583.     XmNy = 1;
  1584.     };
  1585.     controls {
  1586.     XmFileSelectionBox {
  1587.         arguments {
  1588.         XmNwidth = 320;
  1589.         XmNresizePolicy = XmRESIZE_NONE;
  1590.         XmNlistVisibleItemCount = 2;
  1591.         XmNlabelFontList = hel_bold_font;
  1592. !        text_font_list = hel_bold_font;
  1593. !            style = XmDIALOG_MODELESS;
  1594. !            XmNresizable = false;
  1595. !            default_position = true;
  1596.         };
  1597.     };
  1598.         };
  1599.     };
  1600.  
  1601. !%% Menu Widgets
  1602. !%%
  1603. object
  1604.     option_menu_1 : XmOptionMenu {
  1605.         arguments {
  1606.     XmNx = -2;
  1607.     XmNy = 30;
  1608.     XmNlabelString = 'RGB:';
  1609.     XmNshadowThickness = 1;
  1610. !            top_attachment = XmATTACH_FORM;
  1611. !            left_attachment = XmATTACH_FORM;
  1612.             XmNmenuHistory = XmPushButton option_button_1;
  1613.         };
  1614.         controls {
  1615.             XmPulldownMenu options_pulldown;
  1616.         };
  1617.     };
  1618.  
  1619. object
  1620.     options_pulldown : XmPulldownMenu {
  1621.         controls {
  1622.             XmPushButton option_button_1;
  1623.             XmPushButton option_button_2;
  1624.             XmPushButton option_button_3;
  1625.         };
  1626.     };
  1627.  
  1628. object
  1629.     option_button_1 : XmPushButton {
  1630.     arguments {
  1631.     XmNfontList = fixed_font;
  1632.     XmNlabelString = 'bleu';
  1633.     };
  1634.     };
  1635. object
  1636.     option_button_2 : XmPushButton {
  1637.     arguments {
  1638.     XmNfontList = fixed_font;
  1639.     XmNlabelString = 'green';
  1640.     };
  1641.     };
  1642. object
  1643.     option_button_3 : XmPushButton {
  1644.     arguments {
  1645.     XmNfontList = fixed_font;
  1646.     XmNlabelString = 'red';
  1647.     };
  1648.     };
  1649.  
  1650. object list_box_1 : XmScrolledList {
  1651.     arguments {
  1652.         XmNitems = string_table("Foobar","Mumble","Lambda","Coke");
  1653.         XmNitemCount = 4;
  1654.         XmNvisibleItemCount = 3;
  1655.     };
  1656. };
  1657.  
  1658. !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
  1659.  
  1660. object
  1661.     menu_bar_1 : XmMenuBar {
  1662.         arguments {
  1663. !        translations = translation_table ('<Btn1Up> : zippy_null()');
  1664.         XmNmenuHelpWidget = XmCascadeButton Help;
  1665.         };
  1666.         controls {
  1667.             XmCascadeButton File;
  1668.             XmCascadeButton Edit;
  1669.             XmCascadeButton Help;
  1670.             };
  1671.         };
  1672.  
  1673. object
  1674.     File : XmCascadeButton {
  1675.     arguments {
  1676.         arguments menus_args;
  1677.     };
  1678.         controls {
  1679.             XmPulldownMenu   sample_pulldown_1;
  1680.             };
  1681.         };
  1682.  
  1683. object
  1684.     Edit : XmCascadeButton {
  1685.     arguments {
  1686.         arguments menus_args;
  1687.     };
  1688.         controls {
  1689.             XmPulldownMenu   sample_pulldown_2;
  1690.             };
  1691.         };
  1692.  
  1693. object
  1694.     Help : XmCascadeButton {
  1695.     arguments {
  1696.         arguments menus_args;
  1697.     };
  1698.         controls {
  1699.             XmPulldownMenu   sample_pulldown_3;
  1700.             };
  1701.         };
  1702.  
  1703. object
  1704.     sample_pulldown_1 : XmPulldownMenu {
  1705.         controls {
  1706.             XmPushButton sample_push_button_1;
  1707.             XmPushButton sample_push_button_2;
  1708.         XmCascadeButton    About;
  1709.         XmSeparator {};
  1710.         XmPushButton Quit;
  1711.             };
  1712.         };
  1713.  
  1714. object
  1715.     sample_pulldown_2 : XmPulldownMenu {
  1716.         controls {
  1717.             XmPushButton s_push_button_1;
  1718.             XmPushButton s_push_button_2;
  1719.             XmPushButton s_push_button_3;
  1720.         XmCascadeButton    morestuff;
  1721.             };
  1722.         };
  1723.  
  1724. object
  1725.     sample_pulldown_3 : XmPulldownMenu {
  1726.         controls {
  1727.         XmPushButton {
  1728.         arguments {
  1729.             arguments menus_args;
  1730.             XmNlabelString = 'Overview...';
  1731.             };
  1732.         };
  1733.         XmPushButton {
  1734.         arguments {
  1735.             arguments menus_args;
  1736.             XmNlabelString = 'Bindings...';
  1737.             };
  1738.         };
  1739.         XmPushButton {
  1740.         arguments {
  1741.             arguments menus_args;
  1742.             XmNlabelString = 'Tutorial...';
  1743.             };
  1744.         };
  1745.             };
  1746.         };
  1747.  
  1748. object
  1749.    About : XmCascadeButton {
  1750.     arguments {
  1751.         arguments menus_args;
  1752.     };
  1753.     controls {
  1754.         XmPulldownMenu About_1;
  1755.         };
  1756.     };
  1757. object
  1758.    morestuff : XmCascadeButton {
  1759.     arguments {
  1760.         arguments menus_args;
  1761.     };
  1762.     controls {
  1763.         XmPulldownMenu pulldown_2;
  1764.         };
  1765.     };
  1766.  
  1767. object
  1768.     About_1 : XmPulldownMenu {
  1769.     controls {
  1770.         XmPushButton {
  1771.         arguments {
  1772.             arguments menus_args;
  1773.             XmNlabelString = 'Motif Periodic Table v1.1';
  1774.             };
  1775.         };
  1776.         XmPushButton {
  1777.         arguments {
  1778.             arguments menus_args;
  1779.             XmNlabelString = 'Created by Michael K. Yee';
  1780.             };
  1781.         };
  1782.         XmPushButton {
  1783.         arguments {
  1784.             arguments menus_args;
  1785.             XmNlabelString = '         [August 1990]';
  1786.             };
  1787.         };
  1788.         };
  1789.     };
  1790.  
  1791. object
  1792.     pulldown_2 : XmPulldownMenu {
  1793.     controls {
  1794.         XmPushButton {
  1795.         arguments {
  1796.             arguments menus_args;
  1797.             XmNlabelString = compound_string('THANKS FOR',separate=true)
  1798.                         & 'ALL THE FISH.';
  1799.             };
  1800.         };
  1801.         };
  1802.     };
  1803.  
  1804. object
  1805.     sample_push_button_1 : XmPushButton {
  1806.     arguments {
  1807.         arguments menus_args;
  1808.         XmNlabelString = 'New';
  1809.         };
  1810.     };
  1811.  
  1812. object
  1813.     sample_push_button_2 : XmPushButton {
  1814.     arguments {
  1815.         arguments menus_args;
  1816.         XmNlabelString = 'Open Software ...';
  1817.         };
  1818.     controls {
  1819. !    question_dialog open_dialog;
  1820.     };
  1821.     };
  1822. object
  1823.     s_push_button_1 : XmPushButton {
  1824.     arguments {
  1825.         arguments menus_args;
  1826.         XmNlabelString = 'Cut';
  1827.         };
  1828.     };
  1829.  
  1830. object
  1831.     s_push_button_2 : XmPushButton {
  1832.     arguments {
  1833.         arguments menus_args;
  1834.         XmNlabelString = 'Copy';
  1835.         };
  1836.     };
  1837.  
  1838. object
  1839.     s_push_button_3 : XmPushButton {
  1840.     arguments {
  1841.         arguments menus_args;
  1842.         XmNlabelString = 'Paste';
  1843.         };
  1844.     };
  1845.  
  1846. object
  1847.     Quit : XmPushButton {
  1848.     arguments { 
  1849.         arguments menus_args;
  1850. !        x = 10;
  1851. !        y = 200;
  1852.     };
  1853.     callbacks { 
  1854.         XmNactivateCallback = procedure quit_button_activate();
  1855.     };
  1856.     };
  1857.  
  1858. end module;
  1859.